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8 August 1988 
LIST, Harvey Rait 
5 Peri Lane 
Valley Stream NY 11581 


Dear Harvey, 


You might want to use this as a supplement to the item 
by Charlie Urban in the May issue. 


I have the Zebra disc. I have the same need as Urban to 
reset the 2068 frequently, and I solved the problem in 
essentially the same manner. But it is not necessary to open 
the computer and perform internal soldering. 


The two points to which the push-button is connected 
are available on the connector in back of the 2068. RESET is 
pin 24А; ground is pin 7B. 


me] 


John McMichael 
1710 Palmer Drive 
Laramie, UY 82070 
August 15, 1988 


Dear T/S User Group: 


Greetings from Wyoming! Yes, believe it or not, Timex/Sinclair 
computers are alive and well even here in Wyoming, USA. 


I'm very excited to announce that I have developed a neu and 
unijue line of hardware and software to expand the usefulness 
anc enjoyment of T/S 2068 computing. 


Approximately one year ago, I developed an interface and soft- 
ware that would allow an unmodified COMMODORE 1520 four-color 
printer/plotter to be used with a 2068 computer. At that time 
the 1520 was being abandoned by COMMODORE апа 1520"s could be 
purchased for a fraction of their original cost from several 
sources. Needless to say, the stocks of inexpensive "dumped" 
152776 were very quickly depleted, making the 1520 a somewhat 
difficult item to find today. 


The disappearance of the 1520 left me wondering what to do with 
the many unsold 1520 I/F boards I had. After much thought, I 
dec: ded to try the I/F with an ОКІМАТЕ 20 printer equiped with а 
COLX:ODORE 64/128 Plug ’n Print cartridge....if this neu marriage 
worked, the 2068 would be able to do something never before 
pos-ible - produce full color screen dumps. 


Sup: isingly, everything fell together in an unusually smooth 
fasion. The old 1520 I/F board could be used "as is" with the 
OKI? ATE 20 and COMMODORE 64/128 Plug ’n Print cartridge, апа 
sofware uas quickly written to allow the 2068 to produce color 
and black & white screen dumps, do word-processing (using 
Cusiomized MScript), and to LLIST / LPRINT with the OKIITATE 20. 


I've inclosed additional information regarding the new 2068/ 
OKI:^TE 20 connection. I would very much appreciate it if this 
infcrmation could be passed around at your next club meeting 
апа or posted on your club bulletin board. Also, if any of your 
members are interested in color plotting with the 2068 and are 
successful at finding а 1520 (I am always attempting to locate 
neu and used 1526’s for resale), please have them write me for 
detzils and a sample color plot. 


Thanks for all your help! 


Sincerely, 


уч 


John McMichael 


DEAK FELLOW T/S 2068 USER: 


The amazing versatility of OKIDATA's OKIMATE 28 printer is 
now available to the T/S 2068 user!! A simple COMMODORE serial 
port emulator circuit, originally developed and sold as an in- 
terface between a T/S 2068 and COMMODORE 1520 4-color printer/ 
plotter has recently been tested and found to uork as an inter- 
face to an ОКІМАТЕ 20 using a COMMODORE 64/128 Plug ’n Print 
cartridge. 

Softoarse for the OKINATE 20 I/F has been written for FULL 
COLOR and black & uhite screen dumps, to enable Customized 
"Script versions 5 or 5.2 to print to the OKIMATE 20, and to 
facilitate LPRINTing and BASIC program LLISTing. 

The OKIMATE 20 and COMMODORE 64/128 Plug 'n Print cartridge 
can be purchased from many discount computer suppliers. Also, 


second hand units can be found at many stores that sell used 
computer equipment. I bought mine used w/cartridge for $89! 


HARDWARE FOR THE LÉ2O06t)70HFIPMPMAarTE zo 


------------------ OKIMATE 20 Specifications: ------------------ 
? Uses 5-10 inch wide plain or thermal paper (tractor/friction 
feed) or acetate transparencies (tor overhead projectors), | | ------------------ I/F Board Specifications: ------------------- 
) Prints in six type sizes ~ up to 136 characters per line. ? Full on-board decoding. (port 63 is used) 
) Prints in Near Letter Quality, draft, underline, super /sub > Only 4 ICs, 1 cap., a &-pin DIN plug/4-cond. cable required. 
script, italics, and reverse (white printing on black). › High quality circuit board features plated-through holes. 
e SEE OKIMATE 20 PRINT SAMPLE BELOW ,..... У May be plugged directly into an expansion board or, for a 
? Can do 7 or 24 pin color and black & white graphics. sal] additional cost, a keyed edge connector will be sup- 


? Color and black ribbons are available through aany dealers. plied for alternate direct connection to the 2068’s rear bus. 


> OKIMATE 20 is compact requiring approx. the saae desk Space 
às а 2068 (not counting a stack or roll of paper behind it). 


OK IMATE го FRINT STYLE SAME LE 


This is an example of PICA (10 CPI/80 CPL) printing. 
This is an example of ELITE (12 CPI/96 CPL) printing. 
This is.an example of FINE (17 CPI/132 CPL) printing. 


This is an example of DOUBLE WIDTH PICA. 


This is an example of DOUBLE WIDTH ELITE. 
This is an example of DOUBLE WIDTH FINE. 


This is an example of PICA ITALIC printing. 
This is an example of ELITE ITALIC printing. 
This 15 an example of FINE ITALIC printing. 


This is an example of UNDERLINED print. 
This is an example of speedy DRAFT print. 
This is an example of NEAR LETTER QUALITY print. 


EST BES ШЕ SG ет‏ ج ا 


SUPERSCRIPT examples: OKIDATA'" e-mc?t SUBSCRIPT avamnin-: wa 


SOF T WARE OR THE 29O6870KIMATE 20 


он БЕСОВ COPY Suc owes 


/ -------- A color and b/w screen dump utility, -------- 
/ > Selectable FULL COLOR or black & white screen duaps. 
/ ) Selectable дир size: 1.6 X 1.25 ; 3.25 X 2.5 inches. 
/ > Variable horizontal positioning of the screen copy. 

| > Accepts any SCREENS CODE file for copying. 

/ >) Will sake sultiple copies. 

| > Copies the entire 24 line screen. 

/ > Complete user notes included. 


were‏ سے ص A‏ سے مص 


As Sir Clive Sinclair says in the picture to the right, -FULL 
COLOR- screen$ hardcopies are finally a reality for Т/5 2068 
users! The COLOR COPY program was used to copy Sir Clive’s like- 
ness in black & white for use with this ad. Unfortunately, the 
time that would be required and cumulative print head wear and 
tear prohibit ae from eass producing color copy samples to send 
out with every brochure. If you would like a color copy saaple, 
please send $1 (or four 25 cent stasps) to help cover expenses, 


= е э зв е э е э э э OKI-DRIVER se в = э э э э э а 


enan CMS/OKI 20 .......... / \ 
/ \ ]  ------- A hi-semory LPRINT / LLIST a.c. driver, ----- \ 
1 -—-- A compatibility patch for CMS V5 or V5.2 --—--- \ / > Compact sachine code driver is less than 500 bytes, & — 
| > Designed to be used with Custosized Mscript V5 / 15.2. \ | resides iaaediately below the User Defined Graphics. \ 
/ > Quickly and easily "patched" into CMS, \ / УА single user call selects LPRINTing or LLISTing. \ 
/ > Provides for word processing with the OKIMATE 20. \ / > AT, TAB, k the °," control are all supported. \ 
/ > The cover page print sample was done with CMS/OKI 20. \ 1| > Concurrent use of a 2040 printer is possible. \ 
| > Complete “patch” procedure and user notes included. \ / > Complete user notes included. \ 


----------------------- ORDER YOURS NOW!! ---------------------- 
NAME: uA LEE Ae уз eh o PO heat а 
ADDRESS: ______________________________________________ 
CITY/STATE/ZIP: ________________________________________ 

QUANTITY DESCRIPTION PRICE EACH | TOTAL 
Û Bare Bd w/parts list | 914.95 ppd 
eel Bare Board and Parts | $20.95 ppd 
mm Assembled and Tested | $30.95 ppd 
TET bd Keyed Edge Connector-1€ | 94.95 ppa] | 


purchased with hardware 


ee —— —— — ——À —— —— ГЕСЕ —À — — —À — —— ----------‏ —— — کا — سے M‏ — س 


— ——————— — —— ee — 


(Pre-paid orders only please.) TOTAL ENCLOSED» 
SEND ALL ORDERS/INQUIRES TO: 
John McMichael, 1710 uci. ud Dr., Laramie, WY 82070 
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*KPLOTTER COMMANDSxx 


LPRINT 


«РЕІМТ 


LPRINT 


LPRINT 


LPRINT 


LPRINT 


CHR$ 


CHR$ 


CHR$ 


CHR$ 


CHR 


CHR 


CHR 


АЛУ 


24: 


24: 


24:7 


243" 


243° 


Dx,»" 


"Rx yy" 


Jx,v" 


Ma, B” 


Move 


Set 


Move 


rel. 


Draw 
rel, 


Move 
rel. 


Draw 
rel. 


Move 


rel. 
current 


to relative 
origin. 


to pt. 


to abs. 


to- pts 


to abs. 


to pt. 


to rel, 


to- pt. 


to rel. 


to abs. 


origin to 
coofids. 


х,у 
0719. 


х,у 
orig. 


х,у 
orig. 


X,» 
orig. 


orig. 


XXPRINTER COMMANDS xx 


LPRINT CHR$ 25;n 


n=O (black ink) 


n=1 (biue 


Ink ) 


n=2 Coreen ink) 
n=3 Cred 


ink) 


LPRINT CHR 26:1 
n78 BBcpi 


n-1 4@cpl 


п=2 20ср | 


n-3.10cpl 


(where cpl=columns of print per Line) 


«PRINT CHR$ 27;n n=@ normai characters 
example: abcdefgh 


п=1 90 дес. rotation 
example: 9COQOm-o-c 
LPRINT CHR 28:n n=@ 
n=l. __ 
DEL кышы мым шли 
ЕС эзе ы AIEEE tut ec ET 
442: ЕБЕЛЕК A Ca А 
POU о САЦА ыс 
NAOT oe Se шу 
MEA a O hk ыл Мм 
QE. CN a LES 
NSO? кызуы ыы e 
ТП? ll ы lcu 
Raab Go feta ect ыш 
212 W Anat сы el кыйт шы лы 
DEI Lone a 2а р а= 
GES н бел кее А tet 
E E ане с 252222 kes 
LPRINT CHR$ 29; п п-й UPPERZiower сазе 
n=] upper/LOWER swap 


LPRINT CHR$ 304 R&SETret inüev/b inb teed 


XXXCHARACTER SETXxx 


S6DBEGHI JKÉMNOPQRSTUUVRT204367885 6 Ke 39b 
Jkl mnoparstuuuxvzca«ti 


NOTE: The character set within the 1520 
Printer/plotter corresponds io the 2068s 
set with the following five exceptions: 


SEED Cc P^ NES 
ext. mode + symb sh. Е = < 
Е " * "eG m д 
A =a 
P = П 

S = CR ш/о 1 inefeed 


- 4 Times Сору Utility For Epson 
Full Page Sideways Enlarged Screen Copy | 


By Keith Skapinski 
7 Atkinson Lane 
Coram, NY 11727 


The following program will allow you to produce a high quality full 

page screen copy to an Epson or Epson compatible printer using an Aerco 
Cor Oliger) printer interface. 

The program works by reading the screen using the POINT command, then 
printing the screen to the printer sideways and four times larger. 

| The BASIC program (figure 1) is fairly slow but can be compiled with 
TiMachine Basic Compiler to speed it up considerably. If you do not have 
TiMachine, you can install the code Cfigure 2) into memory at adress 
64676. The length of the code is poly 674 bytes. 

` *#Use: RANDOMIZE USR 64676..to run compiled CODE,or POKED in code. 


(Figure 1) 


1 nani 
Deere Der 


ca 


Des] 


ч) 


V3 for or res s cr Cr «d 


se ل“‎ M a I I V 


ao pores For Por es de qe 


205 14 255 33 70 255 34 108 32 33 127 0 229 33 27 0 193 237 105 205 136 254 33 127.0 22933 65 0 193 237 105 205 136 
254 33 127 0 22933 8 0 193 237 105 205 136 254 33 2550 34 70 255229 33 0 0 34 76 255 33 252 255 34 78 255 203 
124 225 195 79 254 33 1 0 34 74 255 229 33 12 0 34 84 255 225 195 18 253 33 127 0 229 33 32 0 193 237 105 205 136 
254 42 74 255 35 34 74 255 237 91 84 255 235 167 237 82 226 32 253 124 238 128 242 254 252 33 127 0 229 33 27 0 193 237 
105 205 136 254 33 127 0 22933 75 0 193 237 105 205 136 254 33 1270 229 33 96 0 193 237 105 205 136 254 33 127 0 229 
33 1 0 193237 105 205 136 254 33 175 0 34 72 255 222 33 0 0 34 80 255 33 255 255 34 82 255 203 124 225 195 34 254 
33 0 0 34 74 255 42 70 255 229 42 72 255 193 69 205 55 255 124 181 202 145 253 42 74 255 17 1920 25 34 74 255 42 

70 255 43 229 42 72 255 193 69 205 55 255 124 181 202 173 253 42 74 255 17 48 0 25 34 74 255 42 70 255 43 43 229 42 
72 255 193 69 205 55 255 124 181 202 202 253 42 74 255 17 12 0 25 34 74 255 42 70 255 43 43 43 229 42 72 255 193 69 

205 55 255 124 181 202 231 253 42 74 255 35 35 35 34 74 255 33 127 0 229 42 74 255 193 237 105 205 136 254 205 24 255 205 
2 2551 0 32 205 196 254 124 181 194 178 254 205 78 19 33 127 0 22942 74 255 193 237 105 205 136 254 42 72 255 237 91 

82 255 25 203 122 34 72 255 237 91 80 255 32 1 235 167 227 82 226 50 254 124 238 128 242 112 253 33 127 0 229 33 10 0 

193 237 105 205 136 254 42 70. 255 237 91 78 255 25 203 122 34 70 255 237 91 76 255 32 1 235 167 237 82 226 95 254 124 238 
128 242 237 252 33 127 0 225 33 27 0 193 237 105 205 136 254 33 127 0 229 33 50 0 193 237 105 205 136 254 205 19 255 62 
13 215 205 14 255 195 178 254 33 127 0 68 77 237 10438 0 17 1090 205 188 254 229 33 1270 68 77 23110438 0 17 
237 0 205 188 254 124 181 209 40 1 235 124 181 194 136 254 33 22 43 217 201 33 22 43 217 201 175 237 82 103 111 200 44 201 
62 7 15 245 205 175 47 213 197 205 175 47 225 124 181 227 120 32 11 177 193 40 4 241 63 24 22 241 24 19 177 40 13 26 
15056 9 32 23711 19 35 227 43 24 223193 241 167 33 0 0 48 1 44 15 216 125 2381 111 201 225 78 35 70 35 84 
93 9 229 195 116 46 62 2 195 48 18 62 3 195 48 18 2051762 Цц 0 32 19 20592 3 48 14 21 95 2051133 245 
110 24724118 ш 1 6 0 195 11646 2053 38 71 4 1267 16 2532301 38 0 1112010 0 0 0 0 9 


(Figure 2) - Numbers are read from left to right, top to bottom. €(205,14,etc.) 
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(C) РЕК GRÓNEORG, 1982 37 
RESET HI-SCORE EY ENTERING "FOKE 14514,0" 380 


LET EALLS-3 

LET НІ-РЕЕК 16514 

LET ET-9 

LET EE-11 

LET Ү1і-5СМ «ЕМр-0.5) 

КЕТ К-0 

LET Е=0 

LET F=FEEK 16396 + 256 ж PEEK 16397 + 1 
FAST 

CLS 

FOR T-0 TO 30 

PRINT АТ 0,T;"a'" 

PRINT AT 20,T;"m" 

IF T < 20 THEN FRINT АТ T,0; "m" 


NEXT T 


FOR T-2 TO 18 STEF 2 
FOR I-1 TO 21 STEP 2 
PRINT AT T,I;"W" 


NEXT I 
NEXT T 


FOR T-ET TO EE 


PRINT AT T,31;"m" 


NEXT T 


FRINT АТ 21,0; 


SLOW 


“SCORE: 0 HI-SCORE:";HI 


FOR T-1 TO BALLS 


LET X-30 
LET Y=9 
LET X1--1 


FRINT АТ 21,24;"EALLS:";T 


IF CINKEY$ <> "Z") + (BE-19) THEN БОТО 350 


PRINT AT ET,31;" " 


LET EB-EE*1 
LET BT=ET+1 


PRINT AT EE,31;"A" 


IF (ІМКЕҮ% 


<> 


PRINT AT EE,31;" " 


"S") + (ET-1) THEN GOTO 400 


48 


390 
405 
410 
415 
420 
425 
430 
440 
--450 
460 
470 
500 
505. 
516 
52 
530 
546 
55 
560 
565 
570 
998 
1000 
1010 
1020 
1100 
1110 
1120 
1120 
1140 
1200 
1210 
1220 
1230 
1240 


41250 


0 LET BR=BE-1 


LET BT=BT-1 


PRINT AT ЕТ,З1;"Е" 
IF X=1 THEN LET Xi-1 


LET Х=Х+Х1 


IF (Ү=19)+(ү=1) THEN LET Yi-Yix(-1) 


LET Y=Y+Y1 
LET Ei1-E 


LET E-F + 33xY + X 
IF PEEK & <> 133 THEN GOTO 500 


LET К=К+1 : 
LET Xi-X1x-1 


PRINT АТ 21,63K 


FOKE B,CODE 
FOKE B1,0 


IF X=1 THEN LET Xi-X1x-1 
(X=30)%70 
(Y <= БЕ) ж (Y >= БТ) ж 440 


GOTO 500 - 
GOTO 1000 - 
LET X1--1 


IF NOT (Ү1>0) ж (Y=ET) + (¥1<0) 


LET Ү1=0 
сото 580 


IF Yi-0 THEN LET Ү1=Ү1 + (Y=BE) = (Y-ET) 


GOTO 306 


PRINT АТ Y,X;" " 


NEXT T 
FAUSE 200 
IF HI >= K 
FOKE 16514,K 
SCROLL 
SCROLL 


FRINT "CONGRATULATIONS. NEH HI-SCORE" 


SCROLL 
SCROLL 


PRINT "DO YOU WANT TO FLAY AGAIN (Y/N)?" 


FAUSE 5Е4 


IF INKEY$-"Y" THEN RUN 


CLS 


| 


Қатемен 


LR 


wore 


(Ү-БЕ) THEN GOTO 570): 


THEN GOTO 1200 


10 LET A=FI/FI 

20 LET ЕсРІ-РІ 

30 LET К=Е 

40 LET V=600 

50 LET 5-2) 

60 LET T=15 

70 LET Y=15 

80 CLS 

90 LET X=INT (RND*¥25) 
100 FRINT АТ Ү,Х; "+ пая 
110 РКІМТ AT S,T; " Je" 
120 FRINT AT ш. "ш" 
130 LET У-у- 
140 IF mee tit THEN LET T=T-A 
150 IF INKEYS="F" THEN LET Т=Т+А 
160 IF ЖЕБЕ A THEN LET 5-5-4 
170 IF E THEN LET 8=5-А 
180 IF 25 THEN LET T=25 
190 IF THEN GOTO S500 
200 IF THEN GOTO 350 
210 IF AND S=Y-A THEN GOTO 300 
220 IF S=Y-A AND T <> X THEN GOTO 5 


4 بے 0 4 


Hou ii ou 


x mmu 


230 GOTO 11€ 

300 LET Ү=Ү-5 
310 GOTO 80 
50 LET К=К+А 


360 GDTO 50 

500 CLS 

510 FRINT АТ 10,11; "GAME OUER" 
520 FRINT АТ 12,113K 


enp 


TAR GATES, (by D. E. 
Healey) is a 1K program in 
2: which: the sun is about to ро. 
2 uper nova. A fleet of space ships is - 
waiting to. depart'from Earth to- 
«escape the holocaust: Тһе object is 
0, guide each ship: through star 

à “gates. Ў 2 
<Тһе space ‘ship is situated ‘at the > 
онот of the screen and key 1 is» 
: used to move vertically. upwards. 
“апа keys Q and P. to move Jeft and: 
right respectively. TG > 


nal;p 


inomial distributi 


DIM А(7) 
FOR Х=1 TO 7 

LET A(X)=0 

NEXT X 

FRINT 0,5;"EINOMIAL DISTRIEUTION" 
FRINT 5,15; "m" 

FRINT 7,14; "NS" 

FRINT 9,13; "ERM. 

FRINT 11,12; "веет . 
PRINT 13,11; "тивна. 
PRINT 15,10; "MSRZBE&,. 
FRINT 17,93 ° 

PRINT 18,11; йа 

FRINT 3,15; "0" 


LET ХР-Х 
GOSUE 400 
IF Y-16 THEN GOTO 490 


ctral intensities and- 


2 C program, lik ) 
г prove of immediate изе to teachers: 


XT. 
note 


LET R=RND 
IF К < 0.5 THEN LET Х=Х+1 
IF R >= 0.5 THEN LET X-X-1 
GOSUE 400 

GOTO 230 

PRINT AT Y,XP; " " 

LET Y=Y+1 

PRINT AT Y,X; "o" 

RETURN 

PRINT AT 16,X; " " 

LET Z-(X-7)/2 

LET A(Z)=A(Z)+1 

LET P-17 

IF Z/2-INT (7/2) THEN LET Р-18 
LET Q-X 

IF A(Z) >= 10 THEN LET Q=Q-1 
PRINT AT P,0; ACD 

IF A(Z)-50 THEN INFUT Z$ 
GOTO 200 


